gsave newpath clippath pathbbox grestore

erasepage

F

T

xpcscrn

cp mif

70 dict begin /showpage{}def /copypage{}def np

o m l n

***

***

G cps np mif

currentfont 1 scalefont setfont

***

u np mif

cps np

m l n

***

cps np mif

g np

exch neg exch

g H

matrix defaultmatrix

m 90 rotate(

statusdict begin

-90 rotate

xpwsh

90 rotate

lineto

}stopped pop end

M

t S

V G

***

1 o

scale

1 H

1 a

moveto

mul

0 t

dup t

dup S

0 H

Y

p

T 4 clrimg


F 3 clrimg


imagemask


image


o

R

C

H

xpawsh

xpash

xpsh

showpage

z

xpscrn

S

t

G

g

Q

save

restore

N

n

mrl

}ifelse

l

m

}{

U

end

begin

sub

add

def

div

dup

neg

V

v

arcto